home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 23 / CU Amiga - Super CD-ROM 23 (June 1998).iso / CUCD / Utilities / M2I / Rexx / OpenDrw.M2I < prev    next >
Encoding:
Text File  |  1998-03-24  |  243 b   |  22 lines
  1. /*
  2.    OpenDraw (Drawer)
  3.  
  4.    Open a drawer
  5.    Usefull to open a drawer with an Hotkey
  6.  
  7. */
  8.  
  9. PARSE ARG Drawer
  10. OPTIONS RESULTS
  11. ADDRESS "M2IPort.Rexx"
  12.  
  13. GET WINDOW Drawer
  14. IF RESULT=1 THEN
  15.  DO
  16.    CLOSEDRW Drawer
  17.  END
  18.  ELSE DO
  19.    OPENDRW Drawer
  20.  END
  21.  
  22.